home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.19970929-19971216 / 000150_news@newsmaster….columbia.edu _Mon Oct 20 11:25:08 1997.msg < prev    next >
Internet Message Format  |  2020-01-01  |  4KB
  1. Return-Path: <news@newsmaster.cc.columbia.edu>
  2. Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.35.30])
  3.     by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id LAA06878
  4.     for <kermit.misc@watsun.cc.columbia.edu>; Mon, 20 Oct 1997 11:25:07 -0400 (EDT)
  5. Received: (from news@localhost)
  6.     by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id LAA11064
  7.     for kermit.misc@watsun; Mon, 20 Oct 1997 11:25:07 -0400 (EDT)
  8. Path: news.columbia.edu!watsun.cc.columbia.edu!fdc
  9. From: fdc@watsun.cc.columbia.edu (Frank da Cruz)
  10. Newsgroups: comp.protocols.kermit.misc
  11. Subject: Re: login script beeps unexpectedly
  12. Date: 20 Oct 1997 15:25:04 GMT
  13. Organization: Columbia University
  14. Lines: 89
  15. Message-ID: <62ft4g$j94$1@apakabar.cc.columbia.edu>
  16. References: <62ejvl$fpk$1@eskinews.eskimo.com>
  17. NNTP-Posting-Host: watsun.cc.columbia.edu
  18. Xref: news.columbia.edu comp.protocols.kermit.misc:7928
  19.  
  20. In article <62ejvl$fpk$1@eskinews.eskimo.com>,
  21. Jim Osborn <jimo@eskimo.com> wrote:
  22. : I use the following macro to connect with my ISP...
  23. :
  24. And which Kermit program are you using?
  25.  
  26. : ... and to reject the
  27. : one line of theirs I know to be unreliable, restarting the dialing
  28. : process if I detect that line.  I'd like the thing to beep at me
  29. : when it eventually connects, so I know to drop whatever else I'm
  30. : doing, but to stay quiet otherwise.
  31. : 
  32. : For some reason, this macro beeps every time it finds the bad modem
  33. : and restarts.  Can someone explain why?
  34. : 
  35. It's not obvious from your script, but if INPUT ECHO is ON, and if the
  36. service sends a beep character, then Kermit will echo it.
  37.  
  38. You can suppress host-generated beeps during terminal emulation and INPUT
  39. echo with:
  40.  
  41.   SET TERMINAL BELL NONE
  42.  
  43. : One minor question: can someone explain the difference between the
  44. : apparently undocumented "beep" command (can't find reference to it
  45. : in the CK60 book, other than its use in a script example)...
  46. :
  47. It's on page 40, but you're right, it's missing from the index.
  48. It just rings the bell or beeps, whatever your console is set up to
  49. do normally when it gets an ASCII BEL character.
  50.  
  51. : and the
  52. : good old "echo \007" command?  The effects are very different.
  53. : 
  54. So you must be using Kermit 95.  In this case, the BEEP command can produce
  55. different sounds, according to:
  56.  
  57. SET BELL { AUDIBLE { BEEP, SYSTEM-SOUNDS }, VISIBLE, NONE }
  58.   This command tells how bell (beep) characters / noises should be sounded or
  59.   displayed.  VISIBLE means to flash the screen rather than making a noise.
  60.   AUDIBLE means to make a noise, which can be either the standard "beep", or
  61.   else "System sounds" that give you three different noises for "information",
  62.   "warning", and "error".
  63.  
  64. (end quote from K95\DOCS\TERMINAL.DOC).  Also the BEEP command itself has
  65. extra syntax in K95:
  66.  
  67.   BEEP { ERROR, INFORMATION, WARNING }
  68.  
  69. The default sound is INFORMATION.
  70.  
  71. The actual sounds for each type of bell are set in your control panel.
  72.  
  73. : define eskimo {
  74. :     while not defined \%1 {
  75. :         askq \%1 {Eskimo Password: }
  76. :     }
  77. :     :retry
  78. :     dial 258-0759
  79. :     in 30 {Your Selection ==>} #Initial selector, choose service
  80. :     output 1\13                #Select Eskimo
  81. :     in 60 login:               #Start login process
  82. :     out jimo\13                #Look for: Hello ,CLI,,27,xxx@seattle2
  83. :     clear input
  84. :     in 30 {Welcome to eskimo.com}      #Read Annex ID string
  85. :     xif \find({CLI,,27},\v(input)) {  #Start over if toxic modem
  86. :         xif \find({@seattle2},\v(input)) {
  87. :             echo {Aborting 27,,2}
  88. :             goto retry
  89. :         }
  90. :     }
  91. :     in 30 Password:
  92. :     out \%1\13
  93. :     in 60 {Main Command?}
  94. :     out {!}                   #Start shell
  95. : #    beep             #doesn't beep until escape back to kermit
  96. :     echo \007    #^G
  97. :     connect /quietly
  98. : }
  99.  
  100. "doesn't beep until escape back to kermit" is evidently a bug.  It's one of
  101. those buffering things -- you tell the system to write something and it says
  102. "OK I wrote it", but it really just put it in a list of things to do, which
  103. evidently it does not get around to doing until something else forces it to.
  104. We'll see if we can find a way to make the system force the beep out
  105. immediately.  In the meantime "echo \007" is a good workaround (James Bond
  106. to the rescue?).
  107.  
  108. - Frank